home *** CD-ROM | disk | FTP | other *** search
/ Sun Solutions 1997 April to September / Sun Solutions CD - APR '97 - SEP '97 (704-3778-12 Rev. H)(Sun Microsystems, Inc.)(1997).iso / products / SunSolutions / script.new < prev    next >
Text File  |  1996-06-03  |  6KB  |  304 lines

  1. (strip driver-strip
  2.     (set frames 6)
  3.     //(set loc [3 10 3 133 3 256 3 379 3 502 3 625])
  4.     //(set size [555 122])
  5.     (set loc [84 10 84 133 84 256 84 379 84 502 84 625])
  6.     (set size [119 122])
  7.     (set seq [0 1 2 3 4 5])
  8.     (set ticks[3])
  9.     (set image "drive.gif")
  10. )
  11. (strip road-strip
  12.     (set frames 3)
  13.     (set loc [240 10 240 133 240 256 240 379 240 502 240 625])
  14.     (set size [318 122])
  15.     (set seq [0 1 2])
  16.     (set ticks[2])
  17.     (set image "drive.gif")
  18. )
  19. (strip hair-strip
  20.     (set frames 3)
  21.     (set loc [45 10 45 133 45 256 45 379 45 502 45 625])
  22.     (set size [20 30])
  23.     (set seq [0 1 2 1 2 1 2 1 2 1])
  24.     (set ticks[8 3])
  25.     (set image "drive.gif")
  26. )
  27. (strip software-strip
  28.     (set frames 7)
  29.     (set loc [146 232 146 310 146 388 146 466 146 544 303 100 303 178])
  30.     (set size [130 76])
  31.     (set seq [-1 1 2 3 4 5 6 5 4 3 2 1])
  32.     (set ticks[4])
  33.     (set image "bigbutt.gif")
  34. )
  35. (strip hardware-strip
  36.     (set frames 7)
  37.     (set loc [1 147 1 231 0 315 1 399 1 483 1 567 146 147])
  38.     (set size [142 83])
  39.     (set seq [-1 1 2 3 4 5 6 5 4 3 2 1])
  40.     (set ticks[4])
  41.     (set image "bigbutt.gif")
  42. )
  43. (strip services-strip
  44.     (set frames 7)
  45.     (set loc [293 255 293 336 293 417 293 498 293 579 434 99 434 180])
  46.     (set size [139 79])
  47.     (set seq [-1 1 2 3 4 5 6 5 4 3 2 1])
  48.     (set ticks[4])
  49.     (set image "bigbutt.gif")
  50. )
  51. (strip comprod-strip
  52.     (set frames 5)
  53.     (set loc [434 261 434 367 434 473 434 579 146 621])
  54.     (set size [130 104])
  55.     (set seq [-1 1 2 3 4])
  56.     (set ticks[4])
  57.     (set image "bigbutt.gif")
  58. )
  59. (strip catalog-strip
  60.     (set frame 2)
  61.     (set loc [49 99])
  62.     (set size [50 48])
  63.     (set seq [-1 0])
  64.     (set image "bigbutt.gif")
  65. )
  66. (strip products-strip
  67.     (set frame 2)
  68.     (set loc [149 99])
  69.     (set size [50 48])
  70.     (set seq [-1 0])
  71.     (set image "bigbutt.gif")
  72. )
  73. (strip info-strip
  74.     (set frame 2)
  75.     (set loc [250 99])
  76.     (set size [50 48])
  77.     (set seq [-1 0])
  78.     (set image "bigbutt.gif")
  79. )
  80.  
  81. ///////////////////////////////////////////////////////////////////////
  82. // ACTORS
  83. ///////////////////////////////////////////////////////////////////////
  84.  
  85. (actor bg
  86.     (on init
  87.         (set ticker-delay 30)
  88.         (set debug 0)
  89.     (set loop-sound -1)
  90.     )
  91. )
  92. (actor driver
  93.     (on init
  94.         (set visible 2)
  95.         (set strip "driver-strip")
  96.         //(set loc [21 201])
  97.         (set loc [102 201])
  98.         (set timer -150)
  99.         (set run -8)
  100.     )
  101.     (on timer
  102.         (set run -8)
  103.         (set timer -150)
  104.     )
  105.     (on movein
  106.         (set road.ticks [1])
  107.         (set ticks [1])
  108.         (set timer 0)
  109.         (set run 1)
  110.     )
  111.     (on moveout
  112.         (set road.ticks [2])
  113.         (set ticks[3])
  114.         (set timer -150)
  115.         (set run 0)
  116.     )
  117. )
  118. (actor road
  119.     (on init
  120.         (set visible 2)
  121.         (set strip "road-strip")
  122.         (set loc [258 201])
  123.         (set run 1)
  124.         (set forward 1)
  125.     )
  126.     (on down
  127.         (if forward 1
  128.             (set forward 0)
  129.          else
  130.             (set forward 1)
  131.         )
  132.     )
  133. )
  134. (actor hair
  135.     (on init
  136.         (set visible 2)
  137.         (set strip "hair-strip")
  138.         (set loc [63 201])
  139.         (set run 1)
  140.     )
  141. )
  142. (actor software
  143.     (on init
  144.         (set strip "software-strip")
  145.         (set loc [80 123])
  146.         (set timer 100)
  147.     )
  148.     (on timer
  149.         (set visible -1)    // forces preload gif
  150.     )
  151.     (on movein
  152.         (set run 1)
  153.         (set bg.sound "software.au")
  154.     )
  155.     (on moveout
  156.         (set stop-at 0)
  157.     )
  158.     (on down
  159.         (set url "file:///tmp/httpd/.products/.categories/Software.html")
  160.     )
  161. )
  162. (actor hardware
  163.     (on init
  164.         (set strip "hardware-strip")
  165.         (set loc [225 96])
  166.     )
  167.     (on movein
  168.         (set run 1)
  169.         (set bg.sound "hardware.au")
  170.     )
  171.     (on moveout
  172.         (set stop-at 0)
  173.     )
  174.     (on down
  175.         (set url "file:///tmp/httpd/.products/.categories/Hardware.html")
  176.     )
  177. )
  178. (actor services
  179.     (on init
  180.         (set strip "services-strip")
  181.         (set loc [385 82])
  182.     )
  183.     (on movein
  184.         (set run 1)
  185.         (set bg.sound "services.au")
  186.     )
  187.     (on moveout
  188.         (set stop-at 0)
  189.     )
  190.     (on down
  191.         (set url "file:///tmp/httpd/.products/.categories/Services.html")
  192.     )
  193. )
  194. (actor comprod
  195.     (on init
  196.         (set strip "comprod-strip")
  197.         (set loc [0 310])
  198.     )
  199.     (on movein
  200.         (set run 1)
  201.         (set bg.sound "compprod.au")
  202.     )
  203.     (on moveout
  204.         (set stop-at 0)
  205.     )
  206.     (on down
  207.         (set url "http://localhost:7999/.categories/companies.html")
  208.     )
  209. )
  210. (actor prod
  211.     (on init
  212.         (set loc [4 365])
  213.         (set size [111 49])
  214.     )
  215.     (on movein
  216.         (set comprod.run 1)
  217.         (set bg.sound "compprod.au")
  218.     )
  219.     (on moveout
  220.         (set comprod.stop-at 0)
  221.     )
  222.     (on down
  223.         (set url "http://localhost:7999/.categories/products.html")
  224.     )
  225. )
  226. (actor catalog
  227.     (on init
  228.         (set strip "catalog-strip")
  229.         (set loc [236 338])
  230.     )
  231.     (on movein
  232.         (set bg.sound "cat.au")
  233.     )
  234.     (on moveout
  235.     )
  236.     (on down
  237.         (set seqnum 1)
  238.     )
  239.     (on dragout
  240.         (set seqnum 0)
  241.     )
  242.     (on dragin
  243.         (set seqnum 1)
  244.     )
  245.     (on up
  246.         (set seqnum 0)
  247.         (set url "file:///tmp/httpd/.products/.wais/Catalog.html")
  248.     )
  249.     (on upout
  250.     )
  251. )
  252. (actor products
  253.     (on init
  254.         (set strip "products-strip")
  255.         (set loc [314 338])
  256.     )
  257.     (on movein
  258.         (set bg.sound "sunprod.au")
  259.     )
  260.     (on moveout
  261.     )
  262.     (on down
  263.         (set seqnum 1)
  264.     )
  265.     (on dragout
  266.         (set seqnum 0)
  267.     )
  268.     (on dragin
  269.         (set seqnum 1)
  270.     )
  271.     (on up
  272.         (set seqnum 0)
  273.         (set url "file:///tmp/httpd/.products/.categories/Sun.html")
  274.     )
  275.     (on upout
  276.     )
  277. )
  278. (actor info
  279.     (on init
  280.         (set strip "info-strip")
  281.         (set loc [394 338])
  282.     )
  283.     (on movein
  284.         (set bg.sound "info.au")
  285.     )
  286.     (on moveout
  287.     )
  288.     (on down
  289.         (set seqnum 1)
  290.     )
  291.     (on dragout
  292.         (set seqnum 0)
  293.     )
  294.     (on dragin
  295.         (set seqnum 1)
  296.     )
  297.     (on up
  298.         (set seqnum 0)
  299.         (set url "file:///tmp/httpd/.products/CDware/docs/info/Info.html")
  300.     )
  301.     (on upout
  302.     )
  303. )
  304.